home *** CD-ROM | disk | FTP | other *** search
/ The Guru Press Kit / The Guru Press Kit.iso / pc / theguru.dxr / 00029_qtyes.ls < prev    next >
Encoding:
Text File  |  2002-12-17  |  641 b   |  28 lines

  1. property spriteNum, pMemberNormal, pMemberRollover, pMemberDown
  2.  
  3. on beginSprite me
  4.   pMemberNormal = sprite(me.spriteNum).member
  5.   pMemberRollover = member(pMemberNormal.number + 1)
  6. end
  7.  
  8. on mouseEnter me
  9.   sprite(me.spriteNum).member = pMemberRollover
  10. end
  11.  
  12. on mouseUp
  13.   zel = the moviePath & "QT\QT_Installer"
  14.   zed = the moviePath & "QT:QT_InstallMac"
  15.   if the platform contains "Mac" then
  16.     quick = baOpenFile(zed & ":QuicktimeInstaller", "normal")
  17.     quit()
  18.   else
  19.     quick = baOpenFile(zel & "\QuicktimeInstaller.exe", "Normal")
  20.     quit()
  21.   end if
  22.   quick = 0
  23. end
  24.  
  25. on mouseLeave me
  26.   sprite(me.spriteNum).member = pMemberNormal
  27. end
  28.